home *** CD-ROM | disk | FTP | other *** search
/ Max Calendar 2002 / Max Calendar 2002.iso / pc / Data_2 / Utility2.dxr / 00083_Rollover Schermata DeskTop Pc.ls < prev    next >
Encoding:
Text File  |  2001-10-17  |  913 b   |  33 lines
  1. on exitFrame
  2.   ImpostaCursori()
  3.   channel = rollover()
  4.   repeat with canale = 5 to 8
  5.     if channel = canale then
  6.       if the puppet of sprite canale = 0 then
  7.         puppetSprite(canale, 1)
  8.         Temp = the number of member (the name of member the memberNum of sprite canale & "_ACC")
  9.         if Temp > 0 then
  10.           set the memberNum of sprite canale to Temp
  11.         end if
  12.       end if
  13.       next repeat
  14.     end if
  15.     puppetSprite(canale, 0)
  16.   end repeat
  17.   repeat with canale = 12 to 23
  18.     if channel = canale then
  19.       if the puppet of sprite canale = 0 then
  20.         puppetSprite(canale, 1)
  21.         Temp = the number of member (the name of member the memberNum of sprite canale & "_ACC")
  22.         if Temp > 0 then
  23.           set the memberNum of sprite canale to Temp
  24.         end if
  25.       end if
  26.       next repeat
  27.     end if
  28.     puppetSprite(canale, 0)
  29.   end repeat
  30.   updateStage()
  31.   go(the frame)
  32. end
  33.